home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / C-D / DartmouthXCMDs.cpt / Dartmouth XCMDs Vol 1&2 / card_5488.txt < prev    next >
Text File  |  1989-02-26  |  1KB  |  41 lines
  1. -- card: 5488 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 3241
  5. -- name: FileToClip
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=79 top=300 right=322 bottom=179
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: FileToClip
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   FileToClip
  23.   put the result
  24. end mouseUp
  25.  
  26.  
  27.  
  28. -- part contents for background part 16
  29. ----- text -----
  30. FILETOCLIP XCMD version 1.1
  31. Kevin Calhoun
  32. Paul Sundquist
  33.  
  34. The FileToClip XCMD allows you to choose a text file from a standard file dialog box.  Once you have chosen the text file, FileToClip opens the file and copies its contents to the clipboard.  You can then paste the text into a field, into another application running concurrently under MultiFinder, or into a desk accessory (such as McSink).
  35.  
  36. If an error occurs, FileToClip will return an error message as the result.  Word 1 of this message will be "Error".  If the text was copied successfully, FileToClip returns the full pathname of the file as the result.
  37.  
  38. If you want the text to go directly to a HyperCard field without having to paste it manually, use the FileToField XCMD.
  39.  
  40. FileToClip takes no parameters.
  41.